package com.jyw.system.service.impl;

import cn.hutool.core.collection.CollUtil;
import cn.hutool.core.util.StrUtil;
import com.alibaba.excel.EasyExcel;
import com.alibaba.fastjson2.JSONObject;
import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import com.google.common.collect.Lists;
import com.jyw.common.annotation.DataScope;
import com.jyw.common.constant.ConfigKeyConstant;
import com.jyw.common.constant.UserConstants;
import com.jyw.common.core.domain.CommonResult;
import com.jyw.common.core.domain.entity.SysDept;
import com.jyw.common.core.domain.entity.SysRole;
import com.jyw.common.core.domain.entity.SysUser;
import com.jyw.common.core.domain.entity.vo.SysUserDeptVO;
import com.jyw.common.exception.ServiceException;
import com.jyw.common.utils.SecurityUtils;
import com.jyw.common.utils.StringUtils;
import com.jyw.common.utils.bean.BeanValidators;
import com.jyw.common.utils.spring.SpringUtils;
import com.jyw.system.domain.*;
import com.jyw.system.domain.dto.RouterRegisterUserDto;
import com.jyw.system.domain.dto.SysUserRoleDto;
import com.jyw.system.domain.dto.UserImportDto;
import com.jyw.system.domain.dto.UserPageDto;
import com.jyw.system.domain.vo.SysUserPageVO;
import com.jyw.system.domain.vo.UserCacheVo;
import com.jyw.system.domain.vo.UserDeptInfoVo;
import com.jyw.system.mapper.*;
import com.jyw.system.service.*;
import com.jyw.system.utils.CacheVersionUtils;
import com.jyw.system.utils.UserUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.http.ResponseEntity;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.CollectionUtils;
import org.springframework.util.ObjectUtils;
import org.springframework.web.client.RestTemplate;
import org.springframework.web.multipart.MultipartFile;

import javax.annotation.Resource;
import javax.validation.Validator;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.List;
import java.util.stream.Collectors;

/**
 * 用户 业务层处理
 *
 * @author system
 */
@Service
public class SysUserServiceImpl extends ServiceImpl<SysUserMapper, SysUser> implements ISysUserService {
    private static final Logger log = LoggerFactory.getLogger(SysUserServiceImpl.class);

    @Autowired
    private SysUserMapper userMapper;

    @Autowired
    private SysRoleMapper roleMapper;

    @Autowired
    private SysPostMapper postMapper;

    @Autowired
    private SysUserRoleMapper userRoleMapper;

    @Autowired
    private SysUserPostMapper userPostMapper;

    @Autowired
    private ISysConfigService configService;

    @Autowired
    protected Validator validator;

    @Resource
    private ISysUserDeptService userDeptService;

    @Resource
    private RestTemplate restTemplate;

    @Resource
    private ISysDeptService deptService;

    @Resource
    private ISysContactService contactService;


    /**
     * 根据条件分页查询用户列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    @DataScope(deptAlias = "d", userAlias = "u")
    public List<SysUserPageVO> selectUserList(UserPageDto user) {
        return userMapper.selectUserList(user);
    }

    /**
     * 根据条件分页查询已分配用户角色列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    public List<SysUserDeptVO> selectAllocatedList(SysUser user) {
        return userMapper.selectAllocatedList(user);
    }

    /**
     * 根据条件分页查询未分配用户角色列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    public List<SysUserDeptVO> selectUnallocatedList(SysUser user) {
        return userMapper.selectUnallocatedList(user);
    }

    /**
     * 通过用户名查询用户
     *
     * @param userName 用户名
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserByUserName(String userName) {
        return userMapper.selectUserByUserName(userName);
    }

    @Override
    public SysUser selectUserByOpenid(String openid) {
        return userMapper.selectUserByOpenid(openid);
    }

    /**
     * 通过用户ID查询用户
     *
     * @param userId 用户ID
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserById(Long userId) {
        return userMapper.selectUserById(userId);
    }

    /**
     * 查询用户所属角色组
     *
     * @param userName 用户名
     * @return 结果
     */
    @Override
    public String selectUserRoleGroup(String userName) {
        List<SysRole> list = roleMapper.selectRolesByUserName(userName);
        if (CollectionUtils.isEmpty(list)) {
            return StringUtils.EMPTY;
        }
        return list.stream().map(SysRole::getRoleName).collect(Collectors.joining(","));
    }

    /**
     * 查询用户所属岗位组
     *
     * @param userName 用户名
     * @return 结果
     */
    @Override
    public String selectUserPostGroup(String userName) {
        List<SysPost> list = postMapper.selectPostsByUserName(userName);
        if (CollectionUtils.isEmpty(list)) {
            return StringUtils.EMPTY;
        }
        return list.stream().map(SysPost::getPostName).collect(Collectors.joining(","));
    }

    /**
     * 校验用户名称是否唯一
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public boolean checkUserNameUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkUserNameUnique(user.getUserName());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验手机号码是否唯一
     *
     * @param user 用户信息
     * @return
     */
    @Override
    public boolean checkPhoneUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkPhoneUnique(user.getPhonenumber());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验email是否唯一
     *
     * @param user 用户信息
     * @return
     */
    @Override
    public boolean checkEmailUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkEmailUnique(user.getEmail());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验用户是否允许操作
     *
     * @param user 用户信息
     */
    @Override
    public void checkUserAllowed(SysUser user) {
        if (StringUtils.isNotNull(user.getUserId()) && user.isAdmin()) {
            throw new ServiceException("不允许操作超级管理员用户");
        }
    }

    /**
     * 校验用户是否有数据权限
     *
     * @param userId 用户id
     */
    @Override
    public void checkUserDataScope(Long userId) {
        if (!SysUser.isAdmin(SecurityUtils.getUserId())) {
            UserPageDto user = new UserPageDto();
            user.setUserId(userId);
            List<SysUserPageVO> users = SpringUtils.getAopProxy(this).selectUserList(user);
            if (StringUtils.isEmpty(users)) {
                throw new ServiceException("没有权限访问用户数据！");
            }
        }
    }

    /**
     * 新增保存用户信息
     *
     * @param user       用户信息
     * @param deptIdList
     * @return 结果
     */
    @Override
    @Transactional
    public int insertUser(SysUser user, List<Long> deptIdList) {
        // 新增用户信息
        int rows = userMapper.insertUser(user);
        // 新增用户部门关联
        insertUserDept(user, deptIdList);
        //用户缓存版本号升级
        CacheVersionUtils.userVersionUp();
//        // 新增用户岗位关联
//        insertUserPost(user);
//        // 新增用户与角色管理
//        insertUserRole(user);
//        routerRegister(user);
        return rows;
    }

    /**
     * 向分发器注册用户
     */
    private void routerRegister(SysUser user) {
        RouterRegisterUserDto userDto = JSONObject.parseObject(configService.selectConfigByKey(ConfigKeyConstant.HOSPITAL_ROUTER_SECRET), RouterRegisterUserDto.class);
        userDto.setUserInfo(user);
        try {
            ResponseEntity<CommonResult> response = restTemplate.postForEntity(
                    configService.selectConfigByKey(ConfigKeyConstant.JYW_ROUTER_URL) + "/hospital/hospitalUser/register",
                    userDto,
                    CommonResult.class
            );
            log.info("向分发器注册用户,返回信息:{}", response.getBody());
            if (response.getBody().getCode() != 200) {
                throw new ServiceException("向分发器注册用户失败");
            }
        } catch (Exception e) {
            throw new ServiceException("向分发器注册用户失败");
        }
    }

    /**
     * 新增用户部门信息
     *
     * @param user
     * @param deptIdList
     */
    private void insertUserDept(SysUser user, List<Long> deptIdList) {
        List<SysUserDept> newDeptList=new ArrayList<>();
        Long deptId=user.getDeptId();
        SysUserDept sysUserDept = new SysUserDept();
        sysUserDept.setUserId(user.getUserId());
        sysUserDept.setDeptId(deptId);
        sysUserDept.setIsDefault(1);
        newDeptList.add(sysUserDept);
        if (CollUtil.isNotEmpty(deptIdList)) {
            List<Long> ortherList=deptIdList.stream().filter(a->!a.equals(deptId)).collect(Collectors.toList());
            ortherList.forEach(otherDeptId->{
                SysUserDept otherDept = new SysUserDept();
                otherDept.setUserId(user.getUserId());
                otherDept.setDeptId(otherDeptId);
                otherDept.setIsDefault(0);
                newDeptList.add(otherDept);
            });
        }
        userDeptService.saveBatch(newDeptList);
    }

    /**
     * 注册用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public boolean registerUser(SysUser user) {
        return userMapper.insertUser(user) > 0;
    }

    /**
     * 修改保存用户信息
     *
     * @param user       用户信息
     * @param deptIdList
     * @return 结果
     */
    @Override
    @Transactional
    public int updateUser(SysUser user, List<Long> deptIdList) {
        Long userId = user.getUserId();
        //删除用户与部门的关联
        userDeptService.remove(new QueryWrapper<SysUserDept>().eq(StrUtil.toUnderlineCase(SysUserDept.Fields.userId), userId));
        //新增用户与部门关联
        insertUserDept(user, deptIdList);
        int i = userMapper.updateUser(user);
        //用户缓存版本号升级
        CacheVersionUtils.userVersionUp();
        return i;
    }

    /**
     * 用户授权角色
     *
     * @param roleDto
     */
    @Override
    @Transactional
    public void insertUserAuth(SysUserRoleDto roleDto) {
        if(roleDto.getUserId()!=null){
            Long userId=roleDto.getUserId();
            userRoleMapper.deleteUserRoleByUserId(userId);
            String roleIds=roleDto.getRoleIds();
            if(StrUtil.isNotEmpty(roleIds)){
                List<Long> idsList = Arrays.asList(roleIds.split(",")).stream().map(s -> Long.parseLong(s.trim())).collect(Collectors.toList());
                if(CollUtil.isNotEmpty(idsList)){
                    List<SysUserRole> list = new ArrayList<>();
                    idsList.forEach(roleId->{
                        SysUserRole ur = new SysUserRole();
                        ur.setUserId(userId);
                        ur.setRoleId(roleId);
                        list.add(ur);
                    });
                    userRoleMapper.batchUserRole(list);
                }
            }
        }
    }

    /**
     * 修改用户状态
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int updateUserStatus(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户基本信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int updateUserProfile(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户头像
     *
     * @param userName 用户名
     * @param avatar   头像地址
     * @return 结果
     */
    @Override
    public boolean updateUserAvatar(String userName, String avatar) {
        return userMapper.updateUserAvatar(userName, avatar) > 0;
    }

    /**
     * 重置用户密码
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int resetPwd(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 重置用户密码
     *
     * @param userName 用户名
     * @param password 密码
     * @return 结果
     */
    @Override
    public int resetUserPwd(String userName, String password) {
        return userMapper.resetUserPwd(userName, password);
    }

    /**
     * 新增用户角色信息
     *
     * @param user 用户对象
     */
    public void insertUserRole(SysUser user) {
        this.insertUserRole(user.getUserId(), user.getRoleIds());
    }

    /**
     * 新增用户岗位信息
     *
     * @param user 用户对象
     */
    public void insertUserPost(SysUser user) {
        Long[] posts = user.getPostIds();
        if (StringUtils.isNotEmpty(posts)) {
            // 新增用户与岗位管理
            List<SysUserPost> list = new ArrayList<SysUserPost>(posts.length);
            for (Long postId : posts) {
                SysUserPost up = new SysUserPost();
                up.setUserId(user.getUserId());
                up.setPostId(postId);
                list.add(up);
            }
            userPostMapper.batchUserPost(list);
        }
    }

    /**
     * 新增用户角色信息
     *
     * @param userId  用户ID
     * @param roleIds 角色组
     */
    public void insertUserRole(Long userId, Long[] roleIds) {
        if (StringUtils.isNotEmpty(roleIds)) {
            // 新增用户与角色管理
            List<SysUserRole> list = new ArrayList<SysUserRole>(roleIds.length);
            for (Long roleId : roleIds) {
                SysUserRole ur = new SysUserRole();
                ur.setUserId(userId);
                ur.setRoleId(roleId);
                list.add(ur);
            }
            userRoleMapper.batchUserRole(list);
        }
    }

    /**
     * 通过用户ID删除用户
     *
     * @param userId 用户ID
     * @return 结果
     */
    @Override
    @Transactional
    public int deleteUserById(Long userId) {
        // 删除用户与角色关联
        userRoleMapper.deleteUserRoleByUserId(userId);
        // 删除用户与岗位表
        userPostMapper.deleteUserPostByUserId(userId);
        return userMapper.deleteUserById(userId);
    }

    /**
     * 批量删除用户信息
     *
     * @param userIds 需要删除的用户ID
     * @return 结果
     */
    @Override
    @Transactional
    public int deleteUserByIds(Long[] userIds) {
        for (Long userId : userIds) {
            checkUserAllowed(new SysUser(userId));
            checkUserDataScope(userId);
        }
        // 删除用户与角色关联
        userRoleMapper.deleteUserRole(userIds);
        // 删除用户与岗位关联
        userPostMapper.deleteUserPost(userIds);
        return userMapper.deleteUserByIds(userIds);
    }

    /**
     * 导入用户数据
     *
     * @param userList        用户数据列表
     * @param isUpdateSupport 是否更新支持，如果已存在，则进行更新数据
     * @param operName        操作用户
     * @return 结果
     */
    @Override
    public String importUser(List<SysUser> userList, Boolean isUpdateSupport, String operName) {
        if (StringUtils.isNull(userList) || userList.size() == 0) {
            throw new ServiceException("导入用户数据不能为空！");
        }
        int successNum = 0;
        int failureNum = 0;
        StringBuilder successMsg = new StringBuilder();
        StringBuilder failureMsg = new StringBuilder();
        String password = configService.selectConfigByKey("sys.user.initPassword");
        for (SysUser user : userList) {
            try {
                // 验证是否存在这个用户
                SysUser u = userMapper.selectUserByUserName(user.getUserName());
                if (StringUtils.isNull(u)) {
                    BeanValidators.validateWithException(validator, user);
                    user.setPassword(SecurityUtils.encryptPassword(password));
                    user.setCreateBy(operName);
                    userMapper.insertUser(user);
                    successNum++;
                    successMsg.append("<br/>" + successNum + "、账号 " + user.getUserName() + " 导入成功");
                } else if (isUpdateSupport) {
                    BeanValidators.validateWithException(validator, user);
                    checkUserAllowed(u);
                    checkUserDataScope(u.getUserId());
                    user.setUserId(u.getUserId());
                    user.setUpdateBy(operName);
                    userMapper.updateUser(user);
                    successNum++;
                    successMsg.append("<br/>" + successNum + "、账号 " + user.getUserName() + " 更新成功");
                } else {
                    failureNum++;
                    failureMsg.append("<br/>" + failureNum + "、账号 " + user.getUserName() + " 已存在");
                }
            } catch (Exception e) {
                failureNum++;
                String msg = "<br/>" + failureNum + "、账号 " + user.getUserName() + " 导入失败：";
                failureMsg.append(msg + e.getMessage());
                log.error(msg, e);
            }
            //用户缓存版本号升级
            CacheVersionUtils.userVersionUp();
        }
        if (failureNum > 0) {
            failureMsg.insert(0, "很抱歉，导入失败！共 " + failureNum + " 条数据格式不正确，错误如下：");
            throw new ServiceException(failureMsg.toString());
        } else {
            successMsg.insert(0, "恭喜您，数据已全部导入成功！共 " + successNum + " 条，数据如下：");
        }
        return successMsg.toString();
    }

    @Override
    public List<UserCacheVo> getCache() {
        List<SysUser> sysUserList = UserUtils.cacheList();
        return sysUserList.stream().map(UserCacheVo::new).collect(Collectors.toList());
    }

    @Override
    public UserDeptInfoVo getUserDeptInfo(String phoneNum) {
        SysContact contactByPhone = contactService.findContactByPhone(phoneNum);
        UserDeptInfoVo deptInfoVo = new UserDeptInfoVo(contactByPhone);
        if (!ObjectUtils.isEmpty(contactByPhone)) {
            SysDept dept = deptService.getById(contactByPhone.getDeptId());
            deptInfoVo.setPlace(dept.getDeptPlace());
        }
        return deptInfoVo;
    }

    @Override
    @Transactional(rollbackFor = Exception.class)
    public String importUser(MultipartFile file) {
        List<String> msgList = Lists.newArrayList();
        try {
            String password = configService.selectConfigByKey("sys.user.initPassword");
            //读取Excel
            List<UserImportDto> list = EasyExcel
                    //文件流读取
                    .read(file.getInputStream())
                    //指向对象
                    .head(UserImportDto.class)
                    //指定从多少行开始读取
                    .headRowNumber(2)
                    //指定sheet
                    .sheet()
                    //同步读取
                    .doReadSync();
            log.info("用户导入,解析的数据是:{}", list);
            List<SysUser> collect = list.stream()
                    .map(data -> {
                        SysUser user = data.buildInfo();
                        //设置用户密码
                        if (!ObjectUtils.isEmpty(user.getPassword())) {
                            user.setPassword(SecurityUtils.encryptPassword(user.getPassword()));
                        } else {
                            user.setPassword(SecurityUtils.encryptPassword(password));
                        }
                        user.setCreateBy(SecurityUtils.getUsername());
                        return user;
                    })
                    .collect(Collectors.toList());

            int i = 2;
            //保存数据
            for (SysUser user : collect) {
                i++;
                if (ObjectUtils.isEmpty(user)) {
                    msgList.add(StrUtil.format("第{}行用户信息不存在", i));
                    continue;
                }
                if (ObjectUtils.isEmpty(user.getUserName())) {
                    msgList.add(StrUtil.format("第{}行用户名称为空", i));
                    continue;
                }
                if (ObjectUtils.isEmpty(user.getNickName())) {
                    msgList.add(StrUtil.format("第{}行用户昵称为空", i));
                    continue;
                }
                if (ObjectUtils.isEmpty(user)) {
                    msgList.add(StrUtil.format("第{}行用户手机号码为空", i));
                    continue;
                }
                if (ObjectUtils.isEmpty(user.getStatus())) {
                    msgList.add(StrUtil.format("第{}行用户状态不合法", i));
                    continue;
                }
                SysUser u = userMapper.selectUserByUserName(user.getUserName());
                if (!ObjectUtils.isEmpty(u)) {
                    msgList.add(StrUtil.format("第{}行用户名已存在", i));
                    continue;
                }
                if (!checkPhoneUnique(user)) {
                    msgList.add(StrUtil.format("第{}行手机号重复", i));
                    continue;
                }
                insertUser(user, Lists.newArrayList());
            }
        } catch (Exception e) {
            log.error("资产导入报错", e);
            throw new ServiceException("解析导入模板失败");
        }
        return msgList.stream().collect(Collectors.joining(","));
    }

    @Override
    public List<Long> getUserDeptIds() {
        Long userId = SecurityUtils.getUserId();
        return getUserDeptIds(userId);
    }

    @Override
    public List<Long> getUserDeptIds(Long userId) {
        List<SysUserDept> list = userDeptService.lambdaQuery().eq(SysUserDept::getUserId, userId).list();
        return list.stream().map(SysUserDept::getDeptId).distinct().collect(Collectors.toList());
    }
}
